Object subclass: #RecursivePostorderTraversal
	instanceVariableNames: ''
	classVariableNames: ''
	poolDictionaries: ''
	category: 'BinTree'!

"-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- "!

RecursivePostorderTraversal class
	instanceVariableNames: ''!

!RecursivePostorderTraversal class methodsFor: 'as yet unclassified' stamp: 'RGB 3/8/2011 14:23'!
print:theTree
	"print a tree using postorder traversal"
	((theTree leftKid) notNil) ifTrue: [ RecursivePostorderTraversal print:(theTree leftKid). ].
	((theTree rightKid) notNil) ifTrue: [ RecursivePostorderTraversal print:(theTree rightKid). ].
	Transcript show: (theTree label); show: ' '.! !
